function ex_B747
P1=newplayer(...
'max_step',20,...
'step_func',@B747_step,...
'draw_player_func',@B747_draw_player,...
'pos',[0,0,0],...
'ang',[5,12,0]*pi/180,...
'vertices',load('-ASCII','B747/vertices.mat'),...
'faces',load('-ASCII','B747/faces.mat')...
)

G=newgame({P1},...
'pause','pause(0.1)'...
)


G=simgame(G)

